BASIC - Beginners' All-purpose Symbolic Instruction Code 

To connect your teletype to the Time-sharing system, press the ORIG key. If you hear a tone 
(speaker should be turned up), and then no tone, you are ready to enter the Hello sequence. 
In the Hello sequence shown below, lower-case letters are used to indicate systems output 
and upper-case for user's input. Incidentally, to disconnect your teletype from the Time- 
sharing system, press the CLR key. 

HELLO fi 

User number — S100000 (must be 6 digits or 1 letter and 5 digits) fi 

System -- BASIC fi 

New or old -- NEW (unless problem has been saved) fi 

New problem name -- EXAMPL (any 1 to 6 characters) fi 

All state- (10 PRINT "X". "SINE X" fi 

ments re- (20 READ X fi 

quire a (30 LET Fl = X fi 

numeric (40 LET F2 = 1 

label no (50 FOR F = 3 to 19 STEP 2 fi 

more than (60 LET F2 = F*(F-1) * (-F2) fi 

5 digits & (70 LET Fl = Fl + (X ♦ F. F2) fi 

no spaces (80 NEXT F fi 

(90 PRINT X. Fl fi 

(100 GO TO 20 fi 

(110 DATA 1. 5707. 1. 0471, . 7854. . 6283 fi 

(99999 END fi 

(LIST fi (--XXXXX to list your program beginning at statement No. XXXXX) 

Without (RUN fi (if you want your program to run) 

statement (STOP (if you want printing to stop) 

labels (SAVE fi (if you want your program saved for later use) 

(UNSAVE fi (if you want to destroy a previously saved program) 

(CATALOG fi (if you want the names of programs saved for a user number) 

(NEW fi (to erase current program and to start a new program) 

(OLD fi (if in the Hello sequence, would search for saved programs) 

(SCRATCH fi (erases a current program but retains the name) 

(RENAME fi (if you want to rename a program) 

Return Kev fi - Will not orint on hard copv 

"♦"" Key - Erase one character for each back error (spaces are considered characters) 
Alt. Mode Key - If pressed will erase an entire line. 

Variables are single letters possibly followed by a single digit. A number may be up to nine 
digits. 

A line of print may contain five zones of fifteen spaces each. Variables printed will be no 
more than six significant spaces each, except for integers. Any trailing zeros after the 
decimal point are not printed. For numbers less than 0. 1, the form X. XXXXXX E - Y is 
used unless the entire number can be printed as a six decimal number: i. e. , . 03456 is exact: 
3. 45600 E - Z has been rounded. If the number is an exact integer, the decimal point is nui 
printed. Integers of up through 9 digits are printed in full. 

Hierarchy of Arithmetic Operators : 1) The expression inside a parenthesis pair is computed 
before the parenthesized quantity is used in further computations: 2) Raising to a power is 
computed before multiply and or divide which in turn are computed before addition and or 
subtraction, in the absence of parenthesis: 3) Several arithmetic operators of the same order 
are computed from left to right. 



Correction to a Program - (For explanation of error messages see Pages 53 & 54 of BASIC 

MANUAL) 

Changing a line -- Type it correctly with the same line number. 

Inserting a line -- Type it with a line number between those of the two existing. BASIC sorts 

your program statements for you. 
Deleting a line -- Type the line number only, followed by the "Return Key". 

Summary of the 15 BASIC Statements - In this summary it is assumed that all statements begin 
with a line number. Following each is one example. 

L£T 
READ 
DATA 
PRINT 



G0T0 
IF-THEN 

FOR 

NEXT 
END 
ST0P 
DEF 

G0SUB 

RETURN 
DIM 

REM 



LET <yariabk> = <^xpressiof> . i. e.. 10 LET XI - Y + Z _ (Z /A - B t Dl) 

READ <yariable> . <yariabl|> (variable) i. e.. 10 READ X Y. AL Q(L J) 

DATA <number> . <number> .... <numbep> i. e. , 1, 2, -3, 7, 12a 479, -2. 35-4 

PRINT <j,abel> , or <labe£> <^xpressioi> . or <§xpressio]V> 
10 PRINT "SINE". "X(I. K). A + B*C0S(Y) 

G0T0 <Jine numbei> i. e. . 10 G0T0 17 

IF <expressior> <^elationa]> <expressior> THEN <|ine numbei> i. e. . 10 
IF X + Y THEN 419 

F0R ^subscripted variable^ = <|xpressior> T0 <|xpressio$>STEP 4xpressioi> 
10 F0R I = 1 T0 17 10 F0R XI = T0 7 STEP 0. 5 

NEXT <£nsubscripted variable> i. e. . 10 NEXT XI 

END i. e. . 10 END 

ST0P i. e. . 10 STOP 

DEF FN <letter> ( <£nsubscripted variabl£> ) = <^xpressio^> 
10 DEF FNG(Z) = 1 + SQR(1 + Z * Z) 

G0SUB <line numbei> i. e. . 10 G0SUB 110 

RETURN i. e. . RETURN 

DIM<lettei> ( <inh T ,vr> 1 or <4etter> ( <integer> , <integer> ) 
10 DIM A(17), B(3, 20) 

REM <any string of characters whatsoever> 10 REM THIS IS THE END OF 
APPENDIX C 



BASIC has available to the user the following functions: 
FUNCTIONS 



SIN (X) 
COS (X) 
TAX (X) 

ATN (X) 

exp a 

int (: 



PURPOSE 

Sine of X 

Cosine of X 

T angent of X 

Arctangent of X 

Natural exponential of X. c x 
Absolute value of X. IXI 
Natural logarith of IXI 
Square root of IXI 



X must be in radians 



